home *** CD-ROM | disk | FTP | other *** search
/ ETO Development Tools 4 / ETO Development Tools 4.iso / Essentials / Developer Essentials May91 / MPW Interfaces & Libraries 3.2 / PInterfaces / Finder.p < prev    next >
Encoding:
Text File  |  1991-04-17  |  2.1 KB  |  75 lines  |  [TEXT/MPS ]
  1. {
  2.     File:        Finder.p    
  3.  
  4.     Contains:    File types of alias files and other Finder/system things.
  5.     
  6.                 
  7.      Copyright © Apple Computer, Inc. 1990-1991 
  8.     All rights reserved
  9.  
  10. }
  11.  
  12. {$IFC UNDEFINED UsingIncludes}
  13.     {$SETC UsingIncludes := 0}
  14. {$ENDC}
  15.  
  16. {$IFC NOT UsingIncludes}
  17.     UNIT Finder;
  18.     INTERFACE
  19. {$ENDC}
  20.  
  21. {$IFC UNDEFINED UsingFinder}
  22. {$SETC UsingFinder := 1}
  23.  
  24. {$I+}
  25. {$SETC FinderIncludes := UsingIncludes}
  26. {$SETC UsingIncludes := 1}
  27. {$IFC UNDEFINED UsingAliases}
  28. {$I $$Shell(PInterfaces)Aliases.p}            { include ResolveAliasFile definition }
  29. {$ENDC}
  30. {$IFC UNDEFINED UsingFolders}
  31. {$I $$Shell(PInterfaces)Folders.p}            { include FindFolder definition }
  32. {$ENDC}
  33. {$IFC UNDEFINED UsingFiles}
  34. {$I $$Shell(PInterfaces)Files.p}            { include Finder info and Desktop Database routines }
  35. {$ENDC}
  36. {$IFC UNDEFINED UsingGestaltEqu}
  37. {$I $$Shell(PInterfaces)GestaltEqu.p}        { include gestalt selectors }
  38. {$ENDC}
  39. {$SETC UsingIncludes := FinderIncludes}
  40.  
  41.  
  42. CONST
  43.      kCustomIconResource                =        -16455;        { Custom icon family resource ID }
  44.  
  45.      kContainerFolderAliasType        =        'fdrp';        { type for folder aliases }
  46.      kContainerTrashAliasType         =        'trsh';        { type for trash folder aliases }
  47.      kContainerHardDiskAliasType     =        'hdsk';        { type for hard disk aliases }
  48.      kContainerFloppyAliasType         =        'flpy';        { type for floppy aliases }
  49.      kContainerServerAliasType         =        'srvr';        { type for server aliases }
  50.      kApplicationAliasType             =        'adrp';        { type for application aliases }
  51.      kContainerAliasType             =        'drop';        { type for all other containers }
  52.  
  53.     { type for Special folder aliases }
  54.      kSystemFolderAliasType             =        'fasy';
  55.      kAppleMenuFolderAliasType         =        'faam';
  56.      kStartupFolderAliasType         =        'fast';
  57.      kPrintMonitorDocsFolderAliasType =        'fapn';
  58.      kPreferencesFolderAliasType     =        'fapf';
  59.      kControlPanelFolderAliasType     =        'fact';
  60.      kExtensionFolderAliasType         =        'faex';
  61.  
  62.     { type for AppleShare folder aliases }
  63.     kExportedFolderAliasType        =        'faet';
  64.      kDropFolderAliasType             =        'fadr';    
  65.      kSharedFolderAliasType             =        'fash';    
  66.      kMountedFolderAliasType         =        'famn';    
  67.  
  68.  
  69. {$ENDC}    { UsingFinder }
  70.  
  71. {$IFC NOT UsingIncludes}
  72.     END.
  73. {$ENDC}
  74.  
  75.